From f091300c7c2e36e23f8f82e468f39615c2df8b87 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Micha=C3=ABl=20Cadilhac?= <michael.cadilhac@lrde.org>
Date: Wed, 7 Mar 2007 12:47:15 +0000
Subject: [PATCH] (PC-do-completion): Delete duplicates in the list of possible
 completions.

---
 lisp/complete.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/lisp/complete.el b/lisp/complete.el
index b56dc268c04..5b77f49ebdf 100644
--- a/lisp/complete.el
+++ b/lisp/complete.el
@@ -560,6 +560,9 @@ of `minibuffer-completion-table' and the minibuffer contents.")
 		   (setq poss (cons (car p) poss))))
 	    (setq p (cdr p)))))
 
+      ;; If table had duplicates, they can be here.
+      (delete-dups poss)
+
       ;; Handle completion-ignored-extensions
       (and filename
            (not (eq mode 'help))
-- 
2.30.2